Sub Ȯ()

    Dim  As Workbook

    On Error Resume Next
        Set  = Workbooks("A.xlsx")
        
        If Err.Number = 0 Then
            MsgBox "  ֽϴ."
        End If

End Sub